﻿Public Class frmCustomChoice

    Private Sub OK_Button_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles OK_Button.Click
        If txtPath.Text = "" Or txtTag.Text = "" Then
            MessageBox.Show("Both fields must be filled.")
        Else
            customPath = txtPath.Text
            customTag = txtTag.Text
            Me.Dispose()
        End If
    End Sub
End Class